home *** CD-ROM | disk | FTP | other *** search
/ Gigarom 1 / Gigarom Macintosh Archives (Quantum Leap)(CDRM1080320)(1993).iso / FILES / HYP / E-G / ForeGnd to Bkgnd.cpt / ForeGnd to Bkgnd / card_3726.txt < prev    next >
Text File  |  1989-02-26  |  3KB  |  168 lines
  1. -- card: 3726 from stack: in
  2. -- bmap block id: 4083
  3. -- flags: 4000
  4. -- background id: 3098
  5. -- name: Picture Frame 1
  6. ----- HyperTalk script -----
  7. --Use this Script to auto scroll a scrolling field
  8.  
  9. on idle
  10.   get the scroll of card field id 4
  11.   if it > 600 then
  12.     set the scroll of card field id 4 to 0
  13.   else
  14.     set the scroll of card field id 4 to (4+it)
  15.   end if
  16. end idle
  17.  
  18. on opencard
  19.   wait 2 seconds
  20.   set the scroll of card field id 4 to 0
  21.   show card field id 4
  22. end opencard
  23.  
  24. on closecard
  25.   hide card field id 4
  26. end closecard
  27.  
  28.  
  29. -- part 4 (field)
  30. -- low flags: 01
  31. -- high flags: 2007
  32. -- rect: left=184 top=62 right=178 bottom=462
  33. -- title width / last selected line: 0
  34. -- icon id / first selected line: 0 / 0
  35. -- text alignment: 1
  36. -- font id: 5
  37. -- text size: 12
  38. -- style flags: 0
  39. -- line height: 16
  40. -- part name: 
  41.  
  42.  
  43. -- part 5 (button)
  44. -- low flags: 00
  45. -- high flags: 0000
  46. -- rect: left=46 top=177 right=295 bottom=415
  47. -- title width / last selected line: 0
  48. -- icon id / first selected line: 0 / 0
  49. -- text alignment: 1
  50. -- font id: 0
  51. -- text size: 12
  52. -- style flags: 0
  53. -- line height: 16
  54. -- part name: 
  55. ----- HyperTalk script -----
  56. on mouseUp
  57.   go next card
  58. end mouseUp
  59.  
  60.  
  61.  
  62. -- part 6 (button)
  63. -- low flags: 00
  64. -- high flags: 0000
  65. -- rect: left=46 top=61 right=178 bottom=185
  66. -- title width / last selected line: 0
  67. -- icon id / first selected line: 0 / 0
  68. -- text alignment: 1
  69. -- font id: 0
  70. -- text size: 12
  71. -- style flags: 0
  72. -- line height: 16
  73. -- part name: 
  74. ----- HyperTalk script -----
  75. on mouseUp
  76.   go next card
  77. end mouseUp
  78.  
  79.  
  80.  
  81. -- part 7 (button)
  82. -- low flags: 00
  83. -- high flags: 0000
  84. -- rect: left=413 top=178 right=217 bottom=454
  85. -- title width / last selected line: 0
  86. -- icon id / first selected line: 14767 / 14767
  87. -- text alignment: 1
  88. -- font id: 0
  89. -- text size: 12
  90. -- style flags: 0
  91. -- line height: 16
  92. -- part name: Tell Me About...
  93. ----- HyperTalk script -----
  94. on mouseUp
  95.   if the visible of card field "about" is false then
  96.     show card field "About"
  97.   else hide card field "about"
  98. end mouseUp
  99.  
  100.  
  101. -- part 8 (field)
  102. -- low flags: 81
  103. -- high flags: 0002
  104. -- rect: left=292 top=212 right=290 bottom=457
  105. -- title width / last selected line: 0
  106. -- icon id / first selected line: 0 / 0
  107. -- text alignment: 0
  108. -- font id: 3
  109. -- text size: 9
  110. -- style flags: 0
  111. -- line height: 12
  112. -- part name: About
  113. ----- HyperTalk script -----
  114. on mouseup
  115.   hide card field "about"
  116. end mouseup
  117.  
  118.  
  119. -- part contents for card part 4
  120. ----- text -----
  121.  
  122. *************************
  123.  
  124. Many novice users, (I include 
  125.  
  126. myself during the BeforeTimes,) 
  127.  
  128. create great first time stacks. 
  129.  
  130. But unfortunately they have 
  131.  
  132. created all the graphics and all 
  133.  
  134. the buttons and all the fields on 
  135.  
  136. the first card. Now, a light bulb 
  137.  
  138. goes off in their heads and they 
  139.  
  140. say "Shucks golly gee whiz! I 
  141.  
  142. should have put all this on the 
  143.  
  144. background instead of the card."
  145.  
  146.   Life is tough!  But here, in the 
  147.  
  148. nick of interstellar time is a 
  149.  
  150. utilities stack which will allow 
  151.  
  152. you to put everything on the 
  153.  
  154. background...
  155.  
  156.  
  157.  
  158. Click on the galaxy if you dare to repair!
  159.  
  160.  
  161.  
  162.  
  163.  
  164. -- part contents for card part 8
  165. ----- text -----
  166. Written by Phil Wyman of Selective Memory, Suite 336, 2530 Berryessa Rd.,San Jose, CA 95132
  167.  
  168. This stack is free...  pass it on!